DIM hDateArray AS Date[]
DIM aDate AS Date

FOR EACH aDate IN hDateArray
  ...
NEXT

Enumerates each element stored in the array.